'From Pharo1.3 of 16 June 2011 [Latest update: #13307] on 4 November 2011 at 5:58:01 pm'!TestCase subclass: #TesteCelulaMina	instanceVariableNames: ''	classVariableNames: ''	poolDictionaries: ''	category: 'Jogo_Campo_Minado_Teste'!!TesteCelulaMina methodsFor: 'as yet unclassified' stamp: 'marcos 11/4/2011 17:58'!testeCelulaMinaPodeSerInstanciada	|celula|		celula := CelulaMina new.		self should: [celula class = CelulaMina].	! !